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SYSTEM IMPLEMENTATION 


INTRODUCTION 


MODEL 80 DISPLAY IOCS 


The Model 80 Display IOCS is an input-output control system designed 
to facilitate use of the Singer Model 80 Display for the System Ten* 
computer by . Singer. The LOCS Macros enable the user to easily 
program the control, format, read, and write operations for the 
Model 80. The [OCS system supports a minimum of one and a maximum 
of ten Model 80 Display units per partition. 


Figure l-l shows the IOCS macros. The macros are called from the 
user's program at assembly time, causing the applicable IO0CS Macro 
expansions to be inserted directly into the user's applications 
program. 


Requirements 


Model 80 Display JI0CS macros are used only in System Ten source 
programs assembled using Assembler II. Maximum memory requirement 
for the IOCS routines is 2K in partition. 


Minimum Hardware Configuration 


@e Model 20 CPU, 2K partition storage for IOCS 
@e Model 80 Display Unit 


Optional Equipment 


Additional Model 80 Display units 
Model 40/42 Disc Drives 

Model 70 Workstation 

Model 50 Line Printer 


*A trademark of the Singer Company. 
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INTRODUCTION 


DISPLAY FORMAT UTILITY 


The Format Utility program allows’ the user to create new format 
files, create format files based on existing files, and display and 
update existing files. 


Requirements 


The Model 80 Display Format Utility program is used under DMF and 
requires the DMF Partition LIOCS OPEN and CLOSE routines, and _ the 
SYSPOL. WORK file. The minimum memory requirement for the Format 
Utility program is a 9K System Ten partition. 


Minimum Hardware Configuration 
@ Model 20 CPU, 9K Partition 
e Model 80 Display Unit 
e Model 40/42 Disc Drive, 
Optional Equipment 
e Additional Model 40 Disc Drives 
e Model 70 Workstation 


SYSTEM IMPLEMENTATION 


Model 80 Display IOCS 


The Model 80 Display I0CS program is released to System Ten 
installations as a set of Assembler II language macros in a _ single 
package; there are six separate macros which must be filed in any 
pool except SYSPOL using the names provided. 


Model 80 Display Format Utility 


The Model 80 Display Format Utility program is released to System 
Ten installations as object text loaded through the DMF 
Conversational Loader. 
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USER'S PROGRAM 


IOCcS 


LINKAGE 


FIGURE 1-1. 
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IOCS SYSTEM MACROS 


GENERAL DESCRIPTION 
1080 

SET 80 

QSR 

M8010 

LOCB 

OPSTR 


PROGRAMMING CONSIDERATIONS 


IOCS SYSTEM MACROS 


GENERAL DESCRIPTION 


The operations performed by the IOCS macros include read, write, and 
write control operations plus the capability to execute a ‘format’ 
file from disc. To accomplish this task, the IOCS macros require: 
e An Input Output Control Block (IOCB) which contains: 
Address of the buffer area 
Length that is associated with the buffer area 
Device number 
Address of the Operation String 
e An Operation String consisting of a string of operators and 
parameters describing the operation. The Operators are 
listed below: | 


Write (W) for write operations 


Control (C) for a write control operation such as cursor 
movement, Screen and keyboard conditioning. 


Read (R) for read operations 


Format (F) indicates a format file is to be executed. 
(A format file is an operation string filed on disc.) 


End (E) indicates the end of the operation string. 


® Calling Sequences which pass parameters lists to. the 
appropriate IOCS subroutines. 


Other capabilities are provided to assist the user in controlling as 
many as ten Model 80's in a partition. These capabilities include: 


e <A 10-Entry Device Table which may be defined as part of the 
IOcs. 


e A Service Request subroutine is provided to query service 
requests. 


LOCS SYSTEM MACROS 


a An I0OCS subroutine is provided to set or drop entries from 
the 10-Entry Device Table. 


To support the functions performed by IOCS, the following six (6) 
Macros are provided. 


L080 


Inserts three IOCS subroutines (_SET80, QSR, and M8010) and a 10- 
Entry Device Table into the user's program. 


SET80 


Establishes the link to the _SET80 subroutine that sets or drops 
entries from the 10-Entry Device Table. 


QSR 


Establishes the link to the QSR subroutine that tests for a Service 
Request, and saves the device number. 


M8010 

Establishes the link to the _M80IO subroutine that executes the 
Format, Input and Output Operations specified by the Operation 
String pointed to by the IOCB. 

IOCB 


Generates a 23-character IOCB that contains control information for 
the M8010 subroutine. 


OPSTR 


Generates an Operation String that represents a series of operations 
directed to one or more Model 80 Display units. 
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YES _ _ § YES , ERROR=label 
[label] 020 fron NO rF [ ,WRITE= | r [ ,READ= | NO | pooh cnc ee 


[label] | SET80 |DEV= , ENTRY=label , IOCB=label[ ,ERROR= | one | It ExEc=Label 
eee#e 3 
[label ]| SET80 |DROP= 


[label] EXCEP=label[ ,10CB=label][ ,DEV= | oe 


[[label] OPSTR=label, LOADR=label r 
[label] SHORT=YES ,OPSTR=label[ ,DEV=n] 


READ 
READ (0000) WRITE 
R WRITE (0000) 
FORMAT (pool. file) R(0000) it W 
F(pool. file) I, READ (entryl,entry2) >} W(0000) 
R(entryl,entry2) WRITE('data string') 


YES 


[ , ILOLEN=nnnn][ ,DEV=n][,SHORT= | a 


[label]] OPSTR] [ | 


READ (label) W('data string') 
R(label) 


CONTROL (seein £ : oe ) NOEND 
(,4 CNTL | g of parameters p,p,.... 5P Bre END ; 


(‘control character string') 


C E 


FIGURE 2-1. LOCS MACRO INSTRUCTIONS 
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LOCS SYSTEM MACROS 


L080 


This macro call is used once within the user's program and must 
precede all other IOCS macro calls. It requires a maximum of 2K of 
core partition to generate these subroutines if all features are 
desired. 


I080 Keyword Operands 


YES _ {YES _ { YES |, [,ERROR=label 
abet} 1000 frome fi Cowart {55 HIE READ= | 7G ase 


YES 


FORMAT= 
NO 


Use FORMT=NO to eliminate the IL0CS code that executes a format 
operation. This operand makes all format operations invalid and 
saves approximately 500 core positions. If this operand is omitted, 
YES is assumed. 


YES 
WRITE= 
NO 


Use WRITE=NO to eliminate the LOCS code that executes a write and a 
write control operation. This operand makes all write and write 
control operations invalid, and saves approximately 200 core 
positions. If the format file contains any write or write control 
operations, the format operation is also invalid. If this operand 
is omitted, YES is assumed. 


YES 
READ= 
NO 


Use READ=NO to eliminate the I0CS code that executes a read 
Operation. This operand makes all read operations invalid and saves 
approximately 400 core positions. If this operand is omitted, YES 
is assumed. 


ERROR=label 


Use this operand to establish the address of the user routine that 
receives control whenever a Service Request is received from a 
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SET80 


IOCS SYSTEM MACROS 


device which has no entry in the device table. This operand is 
required when the SRBR operand is not specified. 


SRBR=(labell,label2) 


Use this operand to eliminate the 10-Entry Device Table and SET80 
subroutine. This operand is used whenever all devices use one IOCB 
and one user's processing routine and saves approximately 400 core 
positions. The user routine (labell) is where control is 
transferred each time a Service Request is recognized. The IOCB 
(label2) is where the device number is stored. 


To generate the linkage to the _SET80 subroutine that either sets or 
drops entries in the 10-Entry Device Table, issue the SET80 macro 


instruction and specify one or more of the keyword operands listed 
below. 


SET80 Keyword Operands 


ALL 
I 
[label] | SET80 |DEV= QokDEY , ENTRY=label , IOCB=label[ ,ERROR= {is | 1{ EXEC=Label] 
Ci fig eet) label 


[label] |SET80 |DROP= 


ALL Devices O thru 9 

QSRDEV Device number stored by QSR subroutine 
DEV= cae 

(ns. Nsése-st) series of selected devices 

n Single device entry 


The parameter specifies the device entries that will be modified 
when the storing function is executed. This operand is required. 


ENTRY=label 


The label is the entry point of the user's processing routine to be 
stored in the 10-Entry Device Table. This operand is required. 


IOCS SYSTEM MACROS 


TOCB=label 


The label refers to the address of the IOCB to be stored in the 10- 
Entry Device Table. This operand is required. 


EXEC=label 


This label represents the address of an IOCB and the presence of 
this operand causes the execution of the operation string pointed to 
by the IOCB to each on-line device specified in the DEV= operand. 


ALL 

QSRDEV 

(n,n,n,.,-,n) (see DEV= operand) 
n 


DROP= 


Use this operand to drop entries. 


The 10-Entry Device Table is an optional feature generated by the 
IO80 macro. The table is 100 characters in length, 10 entries of 10 
characters each, and represents the addresses of the IOCB and the 
user's processing routine for each device. 


Figure 2-2 illustrates the 10-Entry Device table after 
initialization. 


ADDRESSES 
IOCB USER's PROC. RIN 


DEVICE 


FIGURE 2-2. INITIALIZED 1LO-ENTRY DEVICE TABLE 


IOCS SYSTEM MACROS 


To set entries in the table, issue the SET80 macro call. 

SET80 DEV=(3,4,7,9) , LOCB=ABC, EXTRY=XYZ 
For example, SET80 was called to set entries for device 3, 4, 7 and 
9, the IOCB address (ABC=3010 in partition) and the user's 
processing routine address (XYZ=4210 in partition) in Figure 2-3. 


ADDRESSES 
IOCB USER's PROC. RIN 


DEVICE 


FIGURE 2-3. 1/0 ENTRY DEVICE TABLE SHOWING STORED ENTRIES 


To drop entries from the device table, issue the SET80 macro call 
for the devices to be dropped. Figure 2-4 illustrates entries 
dropped for devices 4 and 5. Example: 

DROP DEV=(4,5) 


ADDRESSES 


IOCB USER's PROC. RIN 
DEVICE 


FIGURE 2-4. 1/0 ENTRY DEVICE TABLE SHOWING DELETED ENTRIES 


IOCS SYSTEM MACROS 


QSR 


M8010 


QSR generates the link instruction to QSR which were generated by 
the 1080 macro. _QSR tests for a Service Request coming from any 
device on that partition. If a Service Request was posted, QSR 
will retrieve IOCB and entry point data (set by the SET80 macro 
call) from the device table relative to the recognized device. The 
IOCB address is stored in Index Register 3 and the device number is 
stored in the IOCB. Control is then passed to the user's processing 
routine. If no user processing routine was entered in the device 
table, the error routine specified by the ERROR= operand of the I080 
macro receives control. When a service request is recognized, the 
device number will be stored in a field labelled QSRDEV. This field 
is accessable by the user and will remain set until another service 
request is recognized by _QSR or a call is made to the M80I0 
subroutine. If no Service Request is posted, control is passed to 
the user's next sequential instruction. 


[label ] (no operands) 


To generate the linkage to the M8010 subroutine that executes the 
format, input and output operations specified by the Operation 
string, issue the M80IO macro instruction and specify one or more of 
the keyword operands listed below. 


There are three basic forms for the M8010 macro. 


The first is the macro name with a single operand, the name of the 
user's exception routine (EXCEP=label). This calling sequence is 
used when control has come from QSR (the device number and the IOCB 
Address are already known). 


The second calling sequence is the macro name with two operands, the 
LOCB name and the name of the user's exception routine (I10CB=label, 
EXCEP=label).« This calling sequence is used when the user program 
initiates I/O in a specific IOCB without having received control 
through QSR. 


The third calling sequence will store a device number in the 
specified IOCB and executes it as in the second calling sequence 
(EXCEP=label,1OCB=Label,DEV=QSRDEV). 


IOCS SYSTEM MACROS 


M80IO Keyword Operands 


[label] |M80I0 |EXCEP=label[ ,IOCB=label][,DEV= | aia 1 


EXCEP=label 


Use this operand to specify the address of the user's error 
exception routine. This operand is required. 


LTOCB=label 


Use this operand to specify the address of the IOCB that contains 
the device number, address of the Operation String, and the buffers 
required for execution of M80IO. If this operand is omitted, the 
contents of Index Register 3 is used as the address of the IOCB. 


NOTE: _QSR moves the IOCB address from the device table into 
Index Register 3. 


QSRDEV 
DEV= 
h 


Use this operand to move either the device number stored by the _QSR 
subroutine or the specified device number into the IOCB_ specified. 
If DEV= is omitted, the device number is assumed to be preset. 


LOCS SYSTEM MACROS 


LOCB 


To generate an IOCB that contains control information for the M80IO 
subroutine, issue the IOCB macro instruction and specify one or more 
of the keyword operands as listed below. 


YES 
NO 


[ DEV=n] [ ,SHORT= | 


; 


[label] OPSTR=label, IOADR=label[ , IOLEN=nnnn] 


There are two IOCB formats, short and standard. 


The standard [OCB contains 23 characters and allows all operators to 
be used in an Operation String. 


IOCB Keyword Operand Standard 


[label] OPSTR=label, IOADR=label[ ,IOLEN=nnnn][ ,DEV=n][,SHORT= NO ] 


OPSTR=label 


Use this operand to set the label of the Operation String into the 
IOCB. This operand is required. 


LOADR=label 


Use this operand to set the label of the data area into the IOCB. 
This operand is required. 


LOLEN=nnnn 


Use this operand to set the length of the data area into the ILOCB. 
One to four numeric characters are allowed, however, this parameter 
must be non-zero. If this operand is omitted, the length of the 
data area given for IOADR is assumed. 


DEV=n 


Use this operand to set the device number into the IOCB. This field 
is set by the _QSR subroutine or the user before calling upon the 
_M80IO- subroutine. If this operand is omitted, device zero is 
assumed. 


IOCS SYSTEM MACROS 


YES 
© HORT= 
NO 


Use SHORT=YES to generate a Short IOCB. If this operand is omitted, 
NO is assumed. 


IOCB Short Form 


[label]|IOCB |SHORT=YES,OPSTR=label [ ,DEV=n ] 


The Short IOCB contains only ten characters and allows only certain 
Operators within the Operation String. These Operators are as 


follows: 
@ CONTROL 
@ END 


& FORMAT (is allowed when the format file contains no read 
operators and the read length (characters 1-4 in the first 
record of the file) is Zero. 

e WRITE 

NOTE: This Operator can be used only when the characters that 

are to be written are contained within the WRITE ('data string') 


form. 


If a read operator is used, M80IO assumes a standard IOCB and user 
fields will be destroyed beyond the end of the short IOCB. 


IOCB Field Definitions and Labels 


_IOTYP _IODEV** _IOPRM* _IOCNT _108C _IOBUF* _IOLEN* _IOFLG _IORD 
0 1 2 516 8 9 10 13/14 17 18 19 22 


OPERATOR STATUS 
COUNT CODE 


SHORT Gf Tee ea eee 
LONG IOCB 


TYPE 
IDENTIFIER 


DEVICE 
NUMBER 


ADDRESS OF 
OPERATION 
STRING 


ADDRESS OF 
BUFFER 


LENGTH OF 
READ OR 
WRITE 


CONTROL KEY 
TERMINATING 
READ or ? 


NUMBER OF 
CHARACTERS 
READ 


IOCS SYSTEM MACROS 


OPSTR 


To generate an Operation String that represents a series of 
operations directed to one or more Model 80 Display units, issue the 
OPSTR macro instruction and specify one or more of the operands 
listed below. 


OPSTR Operands 


READ 
READ (0000) WRITE 
R WRITE(0000) 
FORMAT (pool. file) R(0000) W 
[label] | OPSTR | [ fone tat, READ (entryl,entry2) Il; W (0000) 
R(entryl,entry2) WRITE('data string') 
READ (label) W('data string') 
R(label) 
CONTROL : NOEND 
[.4 CNTL — of parameters PsPs++++ sp) tit END 
? C (‘control character string') : = 


These operands may be repeated in a single OPSTR macro call as many 
times as necessary and in any order to achieve the desired results. 


FORMAT (pool. file) 

F (pool. file) 
Use this operand to generate the Format (F) Operator. Pool name is 
six characters and must be included and separated from the six 
character file name by a period. Pool and file name represent the 
name of a format file. 

READ 

READ (0000) 

R 

R(0000) 

READ(entryl,entry2) 

R(entryl,entry2) 

READ (label) 


R(label) 
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In using the Read Operator, entryl is the length of the read, entry2 
is the buffer address, label is the buffer address and assumes’ the 
assigned buffer length as the length of the read. Omission of these 
fields assumes the length and address in the IOCB that initiated the 
read. 


WRITE 

WRITE (0000) 

W 

W (0000) 

WRITE('data string') 
W('data string") 


The data to be written follows the Write Operator in the Operation 
String. If the quotes are omitted, a warning MNOTE is’ generated. 
If the ‘data string' is not used, the length and address in the IOCB 
that initiated the write are assumed. 


CONTROL(string of parameters p,p,...,p) 
CNTL(string of parameters p,p,...,p) 
C(string of parameters p,p,...,p) 
CONTROL('control character string') 
CNTL('control character string') 


C('control character string") 


The Control Operand is followed by a control character string or a 
parameter string. The control characters and parameters are shown 
in Figure 2-5. Control characters must be repeated as necessary. 
For example, the parameter NLINE=5 would be JJJJJ in a control 
character string. 
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ALTERNATE CONTROL 
PARAMETER PARAMETER || CHARACTER DESCRIPTION 


LOCK Q Lock keyboard 

UNLOCK UL T Unlock keyboard 

BLOCK B R Initiates the block mode read 
FORMAT F S Initiates the formatting mode write 
HOME H - Cursor Hone 

UP=nn U=nn \ Cursor up 

DOWN=nn D=nn ] Cursor down 

RIGHT=nn R=nn Y Cursor right 

LEFT=nn L=nn H Cursor left 

NLINE=nn NL=nn J New line 

TAB=nn T=nn I Tab to next unprotected field 
ERASEX CLEAR X Erase all characters 

ERASE E L Erase all unprotected characters 


NOTE: nn represents a number from O01 - 99 (defaults to O1) 


FIGURE 2-5. MODEL 80 DISPLAY UNIT PARAMETERS, 
ALTERNATE PARAMETERS, AND CONTROL CHARACTER SET 


END 
E 
NOEND 


Use END to generate the End(E) Operator. This operand terminates 
the Operation String. If this operand is omitted and the NOEND 
Operand is not specified, the End (E) Operator is automatically 
generated. This operand or the NOEND Operand must be the last 
operand specified. Use NOEND to generate a contigious (multi- 
labeled) Operation String. Whenever this operand is specified, the 
END Operand is not used. 
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PROGRAMMING CONSIDERATIONS 


1. Locking and unlocking the Keyboard 


The Model 80's keyboard is locked prior to executing any 
Operation String, except where the first Operator in the 
Operation String is a Read. If a read is imbedded within an 
Operation String, the keyboard is unlocked just prior to the 
read. The keyboard is locked following any read. It is not 
unlocked automatically upon exiting _M80IO, but must be 
setup as part of a Control Operator, if the user wants to 
unlock it. 


2e In a multi-terminal environment where the _QSR routine is used: 


A. First operator in an operation string must be a read 
operator (R). 


B. Last control operation must be a control containing 
keyboard unlock. 


C. If the next read is to be a block read, the last control 
operation must also contain set block mode. 


3. When using a Format operation, a read length associated with 
that format file which is greater than '0000' will be stored in 
the IOCB( IOLEN). Therefore, if a fixed length is expected in 
_IOLEN field of the IOCB care must be taken that: 


A. All format files used in connection with the specific 
ILOCB have read length assigned as '0000'. 


Or 


B. After each format operation (normal and/or error return) 
restore the fixed length in the LIOCB. 


4. When the fields IOFLG and IORD, in the IOCB are interrogated 
by the user, it is important to note that those fields represent 
values from the last read. They remain set until the next 
subsequent read on same IOCB which will clear those fields 
before the read, and set new values after the read. 
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5. Model 80 Programming Considerations 
A. Cursor goes to a new line after a read. 
B. A clear control operation also sets cursor home. 


C. A block mode control stays in effect until the next 
read, regardless of other intervening operations. 


Ds. A format mode control stays in effect until the next 
Write operator, regardless of other intervening 
operations. 


E. When a line is written that causes the cursor to stop at 
the first character of a new line, the condition is 
"remembered" by the Model 80 until a data character is 
written or a subsequent new line write control is 
received and ignored. 


F. When a read is short of the number of characters 
entered, a 'STOP CHARACTER' remains in the screen buffer 
and will ‘cut short' any subsequent read of greater 
length. Therefore, it is a recommended practice to: 


e In line mode, read 0080 characters. 
e In block mode, read 1600 characters. 


Ge When a block mode read is terminated on the last line of 
the screen, a status code 1 is set indicating a "page 
wrap'' on the read since the cursor has gone to the top 
of the screen. This status code has priority over 
status code 3 which indicates a control key terminated 
the read and therefore, a control key will never be 
recognized in this situation. 
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GENERAL DESCRIPTION 

WORK FILE 

DELIMITER 

CREATING NEW FORMAT FILES 

CREATING NEW FORMAT FILES USING EXISTING FILES 
UPDATING EXISTING FORMAT FILES 


DISPLAYING FORMAT FILES 
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GENERAL DESCRIPTION 


Model 80 Display Format Utility Program is an interactive utility 
program that builds a format file to be used by the Model 80 Display 
IOCS program to format the screen of the Model 80. The program 
requires a Model 80 display unit for operator input/program output 
and a work file containing a minimum of 40 sectors. The program 
enables the user to create a new format file, create a format file 
using existing files, display and update existing format files. 


NOTE: Throughout the discussion of the Model 80 Display Format 
Utility, the operator action to accept or approve the display is 
by depressing the ENTER key. To disapprove or reject the 
display, the operator depresses any control key except control 
key 5 (1-4, 6-10). Depressing control key 5 reinitializes the 
Format Utility Program. CTL key ll is reserved to indicate a 
return to the DMF Conversational Loader. 


Before starting a formatting job the user may want to create a work 
file or display and change the program delimiters. 


WORK FILE 


To establish a work file (other than the default work file) enter 
the command listed below. 


WORK FILE=pool.file[ ,KEY='password' | 


The work file is established specifically for the Format Utility 
program. It is required by all of the utility commands except for 
DELIMITER. 


The work file is used to keep an intermediate version of the format 
that is being processed to build a new format file or to update 
(without altering) an existing file. The default work file is 
SYSPOL. WORK. 


The MAINT utility and FORMAT programs share the default file 
(SYSPOL. WORK) and must not be run concurrently. 
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DELIMITER 


Also, the FORMAT program uses Partition LIOCS and does not provide 
for interpartition contention of pool free sector list space when 
the output or work file are created. 


Use the DELIMITER command listed below to override the program 
generated delimiter values, or display the current delimiter values. 


DELIMITER 


To create or update a format file, five special characters or 
delimiters are used to identify particular operations. All other 
characters entered by the operator represents a character that will 
be written as protected data. Listed below are the delimiters set 
by the program if this command is omitted. 


DELIMITER MEANING 
( Start-of-Format delimiter 
) Cursor-Right delimiter 
@ Protected-Character delimiter 
\ End-of-Line delimiter 


Unprotected-Blank delimiter 
® Start of Format Delimiter 


The Start of Format delimiter is used to indicate that the next 
character is the start of the format when the format begins in any 
other position other than the home position. It may be used only 
one time in a format. All preceding characters must be either the 
Protected-Character or Unprotected-Blank delimiters. At run time 
the cursor control operation string positions the cursor at the 
character following the Start-of-—Format delimiter. The format 
Starts writing at this position and any data that was on the’ screen 
ahead of this point is left undisturbed. 


® Cursor-Right Delimiter 


One Cursor-—-Right delimiter is used to indicate movement of the 
curosr each position to the right. 


e Protected-Character Delimiter 


The Protected-Character delimiter is used to indicate the 
position of a protected character to be left on the screen, 


e End-of-Line Delimiter 
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An End-of-Line delimiter is used to indicate the end of format 
line which is less than 80 characters in length. 


® Unprotected-Blank Delimiter 
The Unprotected-Blank delimiter is used to indicate that this 
character position is to be replaced by an unprotected space in 
the format file. 
The program displays the current delimiter values and meanings. 
Depress the ENTER key to accept the delimiter. Depress the CTL key 
to override, and enter the five new delimiters in the order 


specified by the program. The program redisplays the new delimiters 
for operator acceptance. 


CREATING NEW FORMAT FILES 


To create a new format file, enter the command listed below. 

CREATE pool. file[ ,KEY='password"] 
If the file exists and is a null type '0' linked sequential file, 
the program continues. If the file is non-null, an error message is 
displayed. 
A password may be assigned if a new file label is to be generated. 
An error message is displayed if a password exists on an existing 


null file and does not match the password provided. 


A new file label is created as a linked sequential type '0' file, 
and contains the following information. 


® Password or Blanks 

e Block and Record Length (set at '0094') 

e Text Description ('Model 80 FORMT') 

e Creation Date '000000' 

e Expiration Date '000000' 
To create a format file, the Model 80 screen is filled with the 
Unprotected-Blank delimiter. The body of the format is created by 


using the following characters. 


1. Any Unprotected-Blank delimiter left on the screen 
represents an unprotected space. 
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2. Any characters that are not delimiters represent protected 
data characters. 


3. All other delimiters placed on the screen represents 
specific cursor movement. 


Depress the ENTER key when the desired format has been created. The 
program analyzes the format, computes the read length, the pre- 
format and post-format cursor control, and screen conditioning 
control characters. The operator is requested to approve the 
control operations preceding the format or to enter new control 
Operations. Control operations preceding the format, if the format 
begins at the home position, are defaulted to clear all characters 
from the screen. The cursor is set at the home position and _ sets 
the format ‘mode write’. See Figure 3-1 for list of control 
Operators. 


If the format begins in other than the home position, the default 
control operations are: 


l. set the format mode write 
2. set the cursor at the home position 
3. move the cursor to the beginning of the format 


The Operator is requested to approve the control operations 
following the format, or enter new ones. Control operations 
following the format represent where the cursor will be placed 
following the format. The default control operations are: 


e Set Cursor Home (first unprotected character) 
@ Set Block Mode Read 
e Unlock Keyboard 


The screen is filled again with the unprotected blank delimiter and 
the format is displayed for acceptance. Upon accepting the format, 
a request is made to approve the computed read length or to enter a 
new read length. The read length is the computed value supplied by 
the program. It gives the number of unprotected character fields 
Starting with the home position to the position of the cursor where 
the enter key was depressed when the format was entered. The user 
may adjust this read length with any value between '0' and ‘'1600'. 
If zero is specified, it indicates the read length will be supplied 
by the user's application program. When the read length is 
established, the CREATE file operation is complete. 
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If the operator does not approve the format, the file is decoded to 
re-display the screen image as it was created, and the operator re- 
creates the format. 


NOTE: The Format program assumes all cursor movement to be to 
the right or new lines and therefore, some cursor control 
Operations (e.g., LEFT UP) will not be decoded and are ignored. 


CONTROL 
OPERATIONS 


ALTERNATE 
SPELLING 


DESCRIPTION 


LOCK LO Lock keyboard 
UNLOCK UN Unlock keyboard 
BLOCK 


Initiates the block mode read 


FORMAT FO Initiates the formatting mode write 
_ HOME 


Cursor home 


UP=nn UP=nn Cursor up 


DOWN=nn DO=nn Cursor down 


RIGHT=nn RI=nn Cursor right 
LEFT=nn 
NLINE=nn 


Cursor left 


New line 


Tab to next unprotected Field 


Erase all characters 


ERASE ER Erase all unprotected characters 


NOTE: mn represents a number from 01 - 99 (defaults to 01) 


FIGURE 3-1 MODEL 80 CONTROL OPERATORS 


CREATING NEW FORMAT FILES USING EXISTING FILES 


To create a new format file using an existing format file, enter the 
command listed below. 


CREATE pool.file[ ,KEY='password'],USE=pooll.filel[ ,KEY='password' | 


If the USE file non-existent or null, the program displays an error 
message and the operator is requested to try again. If a password 
was required and none was entered or entered incorrectly, the 
program displays an error message. 


The USE= file is read into the work file and the work file is 
decoded into a 1599 character screen image as it was originally 
entered and displayed. The data on the screen is ready to be 
modified using the procedures described in the CREATE command. 
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UPDATING EXISTING FORMAT FILES 


To update an existing format file, enter the command listed below. 
UPDATE pool.file[ ,KEY='password"] 


If the file does not exist or is null, the program displays an error 
message and the operator is requested to try again. An error 
message is displayed if the password is incorrect. 


The file is written to the work file and the work file is decoded 
into a 1599 character screen image as it was originally entered and 
again displayed. The data on the screen is modified by following 
the procedures described in the CREATE command. 


DISPLAYING FORMAT FILES 


To display a format file, enter the command listed below. 
DISPLAY pool.file[ ,KEY'password'] 


The program retrieves the file to be displayed and writes it to the 
work file. The screen is filled with 1599 Unprotected-Blank 
delimiters. The Format that is on the working file is executed as 
it would be in the user's program using IOCS. This allows unerased 
unprotected areas to be identified. The program returns to the 
beginning of the program if CTL key 5 is depressed, otherwise, the 
operator is requested to reject or approve the format. If the 
format is rejected, the program proceeds with the UPDATE logic. 
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SUMMARY OF MODEL 80 DISPLAY IOCS MACRO INSTRUCTIONS 


Appendix A ASSEMBLY ERROR MISSAGES 


SUMMARY OF MODEL 80 DISPLAY MACRO MNOTES 


1080 


MNOTE E,'IO80: 


INVALID FORMT PARAMETER-DEFAULT ASSUMED' 


Meaning; This error indicates the FORMT=NO operand was 
incorrectly specified. FORMT=YES was assumed, 
resulting in the code that performs’ the format 
Operation to be included in the generated IOCS 


Subroutines, 
MNOTE E,‘'I080: 


Meaning; This 


error 
incorrectly specified. 


INVALID WRITE PARAMETER—DEFAULT ASSUMED' 


the WRITE=NO 
WRITE=YES was 


indicates operand was 


assumed and 


the code to perform the write and control operations 
was included in the macro expansion. 


MNOTE E,'I080: 
Meaning; This 


code to 


error 
incorrectly specified. 


INVALID READ PARAMETER—DEFAULT ASSUMED' 


indicates the READ=NO operand was 


READ=YES was assumed and the 


perform the read operation was included in 


the macro expansion. 


MNOTE E,'I080: 


Meaning; This error 


the SRBR=operand were given, therefore, the 
error 


of the 


MISSING ERROR PARAMETER--SEE QSR ROUTINE' 


indicates that neither ERROR=operand or 
address 
routine generated by this operand is 


equal to '////' which will be flagged by Assembler 


se as 
generated. 


MNOTE E,'1O80: 


This error 
incorrectly 
Device Table 
in the macro 
had not been 


Meaning; 


an 


error when the  QSR_ subroutine is 


INVALID SRBR PARAMETER! 


indicates that the SRBR_ operand was 
specified. Therefore, the 10-Entry 
and the SET80 subroutine were included 
expansion as though the SRBR_ operand 
used. 
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SET80 


M8010 


MNOTE E'IO80: INVALID KEYWORD OPERAND! 


Meaning; 


MNOTE E,'SET80: 


Meaning; 


This error indicates 
spelled incorrectly. 


MISSING PARAMETER‘ 


This error indicates 


missing. 


that 


that 


MNOTE E'SET80: INVALID DEV/DROP PARAMETER' 


Meaning; 


MNOTE E'SET80: INVALID KEYWORD OPERAND' 


Meaning; 


This error indicates 


entered. 


This error indicates 
spelled incorrectly. 


MNOTE E'M801I0: MISSING PARAMETER' 


Meaning; 


This error indicates 


missing. 


MNOTE E'M801I0: INVALID DEV PARAMETER’ 


Meaning; 


MNOTE E,'M80I0: 


Meaning; 


This error indicates 
number was entered. 


INVALID KEYWORD OPERAND' 


This error indicates 
spelled incorrectly. 


that more 
numbers were entered or that NO device numbers 


that 


that 


that more 


that 


a keyword operand was 


a required operand was 


than 10 device 
were 


a keyword operand was 


a required operand is 


one device 


than 


a keyword operand was 


LOCB 


OPSTR 


MNOTE E,‘LOCB: 


Meaning; 


MNOTE E,'IOCB: 


Meaning; 


MNOTE W,'IOCB: 


Meaning; 


MNOTE W,'IOCB: 


Meaning; 
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INVALID SHORT PARAMETER 


That the Short operand was incorrectly entered, 
therefore, the Long IOCB was generated. 


MISSING PARAMETER 


This error indicates no operands were given. A Long 
IOCB was generated with the IOCB fields left 
undefined. 


IOADR, IOLEN PARAMETERS NOT USED IN SHORT IOCB' 


This warning statement indicates that the IOADR and 
IOLEN operands were given, and that they were not 
used because a Short IOCB was generated. 


INVALID DEVICE PARAMETER’ 


This warning message indicates that more than one 
digit was entered as a device number. It recognized 
only the first digit and stored it as the device 
number. 


MNOTE,'IOCB: INVALID KEYWORD OPERAND' 


Meaning; 


MNOTE E,'OPSTR: 


Meaning; 


MNOTE S,'OPSTR: 


Meaning; 


This error message indicates a keyword operand was 
spelled incorrectly. 


INVALID PARAMETER (xxxxx) --- IGNORED' 


This error indicates that an invalid CONTROL operand 
parameter (xxxxx) was entered and ignored. 


NO PARAMETERS----NO OPERATION STRING CREATED' 


This is a severe error. Because no operands were 
given, no operation string was created. 
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MNOTE E'OPSTR: INVALID POOL.FILE NAME' 


Meaning; This error indicates that the pool and file name 
given in the FORMAT operand was not separated by a 
period. The Format Operator was generated with a 
null pool and file name. 


MNOTE W,'OPSTR: WRITE STRING NOT ENCLOSED IN QUOTES' 


Meaning; This warning statement indicates that the write 
string given in the Write operand was not enclosed 
within quotes, however, the macro attempted to 

generate the proper operator. 


MNOTE E'OPSTR: INVALID CONTROL PARAMETER (zzzzz) --- IGNORED' 


Meaning; This error conditions indicates an invalid parameter 
(zzzzz) was given in the Control operand. The 
Control character was not generated. 


MNOTE W,'OPSTR: END PARAMETER OUT OF SEQUENCE' 


Meaning; This warning statement indicates that the operands 
following the END operand was ignored. 


MNOTE W,'OPSTR: I080 CALL SHOULD PRECEDE OPSTR CALL --- X 
AN INVALID OPERATOR COULD BE INCLUDED IN OPERATION STRING' 


Meaning; This error indicates the I080 call did not precede 
the OPSTR call and it is not known whether all 
operators are valid. All operators were allowed. 


IO080 ERROR ROUTINE 


The user's routine is specified in the I080 Macro Call with the 
operand ERROR=. It receives control when the _QSR_ subroutine 
recognizes a service request from a device which has no entry set in 
the 10-entry device table. The device number is stored in the field 
labelled QSRDEV. If the device is a Model 80, and if the user 
wishes to add this device to the system, then read the device 
(satisfying the service request). Call SET80 to store an entry for 
DEV=QSRDEV. (See sample program in Appendix C.) 


APPENDIX A ASSEMBLY ERROR MESSAGES 


eres renee tenet NER A ASS ER 


M8010 EXCEPTION ROUTINE 


The user's routine is specified in the M80IO Macro Call with the 
operand EXCEP=. It is executed when one of the following errors 


occurs: 
STATUS CODE DESCRIPTION 
l An invalid IOCB was given. 
Z A service request line was up and a Read 


Operator was not the first operator in the 
operation string. 


3 An invalid operator was encountered in the 
operation string. 


4 A fault status was returned from the 
Model 80. 

5 Not used. 

6 A write operation caused a page wrap 
around. 

7 An invalid format file was encountered. 

8 A flag or parity status was returned on a 


read to disc. 


9 A fault status was. returned on a read to 
disc. 


The IOCB address is stored in index register 3. The following 
pertainent information is stored in that IOCB: 


CORE REFERENCE LABEL INFORMATION 
_IOSC Status code. 
_IOCNT The number of the last operator 
executed. (001 represents that the 


first operator was executed and so on.) 


_IODEV Device number. 
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SET80 ERROR ROUTINE 


The user's routine is specified in the SET80 macro call with the 
operand, ERROR=. The SET80 routine, before storing an entry for a 
device, queries that device to see if it is on-line. If the operand 
is omitted or ERROR=IGN is specified, SET80 will not store a device 
entry for that device but will continue to store other entries or 
give a normal return. If the ERROR= operand was specified and if 
any status other than Normal is returned from that query, the error 
exit is taken. Therefore, the following conditions will cause _ the 
error routine to be executed: 


1. Device is not on-line. 
2. Device had service request line up. 
NOTE: The query has cancelled the service request. 
The device number is stored in _STDEV. If the user wishes to 
continue execution of SET80, then the entry point _STRST must be 
used. If the user wishes to know the cause of the error, the first 


instruction of the error routine must be a branch on condition code 
4 then l. 
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The formatting job may or may not take place at the CONO console 

device. If seperate, the following messages are displayed at one or 

both of the devices. 

On CONO Logical Device 

S)FORMAT: DISC ERROR x AT nnnnnn. 
Description: While resolving program overlay disc addresses, a 
bad status was returned from the disc where x represents’ the 
error status returned and nnnnnn represents the disc address of 


the error. 


Action Taken: Program is aborted; DMF Conversational Loader 
is loaded. 


T) FORMAT: DEVICE x IS OFF-LINE. 
Description: Format entry device x is off-line. 


Action Taken: Program is aborted; DMF Conversational Loader 
is loaded. 


A)READY DEVICE Dn. 
Description: Disc drive n is off-line. 
Action Required: Issue service request and press the enter 
key when the device selects. The device is not selected 
immediately because the formatting device (if any) may have 
responded to the message. 
On Model 80 Display Unit (where the formatting is taking place) 
ENTER Command Error Messages 
INVALID COMMAND 
Description: An invalid command was entered. 


Action Required: Re-ent-er command. 


INVALID pool.file NAME 
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Description: An invalid pool.file was entered. 
Action Required: Re-enter command. 
INVALID PASSWORD ENTRY 
Description: The password was incorrectly entered. 
Action Required: Re-enter ommand. 
INVALID FORMAT FILE 
Description: The file entered is not a file type '0', and/or it 
is not valid format file. A valid format file is one containing 
a valid operation string as defined in the Model 80 Display 
Iocs. 
Action Required: Enter new command using another pool.file. 
Create Error Messages 


PARENTHESIS ARE INVALID DATA CHARACTERS. 


Description: One of the characters entered as protected data 
was a parenthesis. 


Action Required: Re-enter format. 


AT LEAST ONE DATA CHARACTER MUST BE ENTERED TO CONSTITUTE A VALID 
FORMAT. 


Description: The format read contained all delimiters and no 
data characters. The result is an invalid format. 


Action Required: Re-enter format. 
INVALID CONTROL STRING: PAGE WRAP ON WRITE 
Description: An error has been made in either the pre-format or 
post-format control operations that has caused the writing of 
the format to wrap around. 
Action Required: Re-enter control operations. 


INVALID READ 


Description: The enter key was depressed when the cursor was in 
the home position. 
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Action Required: Re-enter format and depress the enter key 
at the end of the format. 


ONLY FORMAT FILES CREATED BY THE MODEL 80 FORMAT UTILITY ARE VALID 
AS UPDATE OR USE FILES. 


Description: While decoding the format, an unrecognizable 
character or string of characters was encountered. 


Action Required: Enter new command. 


DELIMITER ERROR MESSAGES 


INVALID DELIMITERS: EACH OF FIVE DELIMITERS MUST BE UNIQUE 


Description: Five delimiters were not entered, or those five 
were not unique characters. 


Action Required: Enter five unique characters. 
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EXAMPLE OF MULTI-TERMINAL ENVIRONMENT PROGRAM 


FILE NAME TYPE CHANGE DATE OF DATE OF DESCRIPTION 
LEVEL EXPIRATION CREATION 
SAMPLE ) 000 = « -— IocS SAMPLE 
RECORD NOe 
1 TITLE ‘'MULTI@® TERMINAL ENVIRONMENT IOCS EXAMPLE?! 
2 NORMAL 
3 ORG 1000 
4 1080 ERROR#®NODEV * INCLUDE r0CS ROUTINE »* 
5 S1ocB I0OCB SHORT#YESs,OPSTR#ST1 * DEFINE I0OCB * 
6 STi OPSTR CONTROL(CLEAR) sWRITE('GOOD MORNING! )y 
7 CONTROL (NLINEs UNLOCK) » END * DEFINE OP STRING * 
8 FrocBp I0CB IOADR®BUFFER,s, OPSTR#ST2 * DEFINE IOCB * 
9 ST2 OPSTR READs,FORMAT(POOL1 eFILE1)sEND * DEFINE OP STRING # 
10 Lrocap I0CB IOADR*®BUFFER, OPSTR=ST3 * DEFINE IOCB * 
11 ST3 OPSTR READ,END * DEFINE OP STRING * 
12 BUFFER DM C1600 * BUFFER AREA ¥* 
13 % RRBBRRRRE RS ARERR RMMREMERERERERAR ER RMAE EE EMER ANEE RK ER ER EERE EN 
14 * *» SET A ENTRY IN 1O@ENTRY DEVICE TABLE FOR ALL DEVICES ON LINE » 
15 ¥ * ALSO SEND GOOD MORNING MESSAGE TO ALL DEVICES ONeLINE® % 
16 ¥ BRERA REEEE RRR ERE MERE MEME EERE EMER EERE REE EEA EEE REE EE EY 
17 START SET8O ENTRY#ENTRY1, IOCB#@F IOCBs ERROR#IGNsDEV®ALL,EXEC*SIOCB 
18 * K<<<8 OC OPTIONAL) USER'S PROGRAM INITIALIZATION >>>>> 
19 BEGIN QSR GO TO SERVICE REQUEST ROUTINE 
20 * KKCCK (OPTIONAL) USER'S BACKGROUND PROCESSING HERE >>>>> 
2i BSW BEGIN LOOP UNTIL SERVICE REQUEST 
22 ¥ 
23 ENTRY1 EQU % FIRST ENTRY POINT FROM QSR 
24 M80IO EXCEP=MERROR * ITOCB AND DEV # SET BY QSR * 
25 ¥ RE BRER RED RRR MRE RYE REEMA RE REMY EEK 
26 % * MODIFY ENTRY POINT FOR THIS DEVICE * 
e7 % RARER EER EMRE RM MRR EERE ERKER ERE EBS 
28 SET8O ENTRY=ENTRY2, IOCBSLIOCBsDEV2QSRDEVs ERROR®IGN 
29 B BEGIN RETURN TO PROCESS ANOTHER DEVICE 
30 * 
31 ENTRYe EQU * SECOND ENTRY POINT FROM QSR 
32 M8OIO EXCEP=MERROR * JOCB AND DEV # SET BY QSR #* 
33 * CCK USER'S DATA PROCESSING ROUTINE >>>>> 
34 8 BEGIN RETURN TO PROCESS ANOTHER DEVICE 
35 * 
36 MERROR EQU * PROCESS ERROR FROM M&OIO 
37 ¥ K<<<<) USER'S HANDLING OF VARIOUS ERRORS >>>>> 
38 B BEGIN RETURN YO PROCESS OTHER DEVICES 
39 * 
40 NODEV EQU * NO@®ENTRY*IN@#TABLE ERROR 
41 * DEV # AND IOCB MUST BE SPECIFIED 
42 M8O0IO IOCBsLIOCB,DEV#xQSRDEVsEXCEPa2MERROR READ DEVICE 
43 SET8O ENTRY@ENTRY1,I0CB#®F LOCBsDEV=QSRDEV 
44 B BEGIN RETURN TO PROCESS OTHER DEVICES 
45 ¥ 
46 EXEC START 
47 END 
FILE SAMPLE IN POOL MIS CONTAINS 47 SECTORS 
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YES _ {YES _ { YES), {,ERROR=label 
abe] 1080 fron NO {it were i Hit reap= | 56 } coairer eee 


[label ]|SET80 |DEV= ss , ENTRY=label , IOCB=label[ ,ERROR= aaa | 1 ExEC=1abe1} 


[label ] ro 


[label] (no operands) 
[label] | M8010 |EXCEP=label[ ,IOCB=label][ ,DEV= 


[label ] OPSTR=label, IOADR=label[ , IOLEN=nnnn |] I 
[label] SHORT=YES ,OPSTR=label [ ,DEV=n] 


READ 
READ (0000) WRITE 
R WRITE(0000) 
FORMAT (pool. file) R(0000) W 
label PS 
[label ])/ OPSTR| | (yore Il; READ (entryl,entry2) Ils W(0000) 
R(entryl,entry2) WRITE('data string') 


| QSRDEV ) 
n 


YES 


[ ,DEV=n][ , SHORT= | NO 


READ (label) W('data string') 
R(label) 


CONTROL (seeiue oe he ) NOEND 
[,4 CNTL | g parameters p,p,....,p ee END 


('control character string') 
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We produce manuals for you, and we want you to find them useful and informative. That’s our job. 
So we're asking you to help us furnish you with the best possible publications. Please take a few minutes to 


answer the following questions. Add any comments you wish. If you desire a reply to any question, be sure to 
include your name and address. 


Thank you. 


e Does this manual meet your needs? Yes |_| No LJ 
If not, what additional information would be of help to you? 


e Can you find what you're looking for quickly and easily? Yes [_] No L] 
How can the organization be improved? 


e Is the material easy to read and to understand? Yes [_] No L] 
Are there enough illustrations to support the text? YesL] = NoL] 
Comments 

e Did you find any errors or ambiguities in the manual? Yes L_] No L] 


If yes, please cite page, line, and/or figure number with your comments. 


e Other comments. 


e What is your relationship to the product described? 
1} Operator. 
Es Programmer. | 
LJ Other (please specify) 
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